﻿Imports System.Collections.Generic
Imports System.Linq
Imports System.Text
Imports System.Windows
Imports System.IO
Imports System.Windows.Markup
Imports System.Windows.Media
Imports System.Windows.Controls
Imports System.Globalization

Public Class WindowMinimizeButton
    Inherits WindowButton
    Public Sub New()
        ' open resource where in XAML are defined some required stuff such as icons and colors
        'Dim resourceSt As Stream = Application.GetResourceStream(New Uri("pack://application:,,,/PT_CustomWindow;component/ButtonIcons.xaml")).Stream
        'Dim rDictionary As ResourceDictionary = CType(XamlReader.Load(resourceSt), ResourceDictionary)

        Me.Content = Me.Resources("WindowButtonMinimizeIcon")
        Me.ContentDisabled = Me.Resources("WindowButtonMinimizeIconDisabled")

        Me.CornerRadius = New CornerRadius(0, 0, 0, 3)
    End Sub
End Class